home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Ken Long / rinth / init.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-04  |  1.7 KB  |  98 lines  |  [TEXT/KAHL]
  1.  
  2. #define NIL_POINTER        0L
  3.  
  4. ToolBoxInit()
  5. {
  6.     InitGraf(&thePort);
  7.     InitFonts();
  8.     FlushEvents(everyEvent, 0);
  9.     InitWindows();
  10.     InitMenus();
  11.     TEInit();
  12.     InitDialogs(0L);
  13.     InitCursor();
  14.     MenuBarInit();
  15. }
  16.  
  17. InitColors()
  18. {
  19.     extern RGBColor    myGreen, myRed, myBlue, myYellow, myWhite, myBlack, myGray, myOrange, myDkBlue;
  20.     
  21.     myGreen.red = 0;
  22.     myGreen.green = -1;
  23.     myGreen.blue = 0;
  24.     myYellow.red = -1;
  25.     myYellow.green = -1;
  26.     myYellow.blue = 0;
  27.     myRed.red = -1;
  28.     myRed.green = 0;
  29.     myRed.blue = 0;
  30.     myBlue.red = 25000;
  31.     myBlue.green = 55000;
  32.     myBlue.blue = -1;
  33.     myDkBlue.red = 0;
  34.     myDkBlue.green = 0;
  35.     myDkBlue.blue = -1;
  36.     myWhite.red = -1;
  37.     myWhite.green = -1;
  38.     myWhite.blue = -1;
  39.     myBlack.red = 0;
  40.     myBlack.green = 0;
  41.     myBlack.blue = 0;
  42.     myGray.red = 20000;
  43.     myGray.green = 20000;
  44.     myGray.blue = 20000;
  45.     myOrange.red = 40000;
  46.     myOrange.green = 25000;
  47.     myOrange.blue = 8000;
  48. }
  49.  
  50. MenuBarInit()
  51. {
  52.     Handle    myMenuBar;
  53.     extern MenuHandle    gAppleMenu, gFileMenu, gEditMenu;
  54.     
  55.     myMenuBar = GetNewMBar(500);
  56.     SetMenuBar(myMenuBar);
  57.     gFileMenu = GetMHandle(501);
  58.     gEditMenu = GetMHandle(502);
  59.     gAppleMenu = GetMHandle(500);
  60.     if (gAppleMenu)
  61.         AddResMenu(gAppleMenu, 'DRVR');
  62.     
  63. } /* MenuBarInit() */
  64.  
  65. LoadSounds()
  66. {
  67.     extern Handle            gSolvedSndH;
  68.  
  69.     LoadSound(&gSolvedSndH, 128, "\p'snd ' Solved (128)");
  70.  
  71. } /* LoadSounds() */
  72.  
  73. UnloadSounds()
  74. {
  75.     extern Handle            gSolvedSndH;
  76.  
  77.     UnloadSound(gSolvedSndH);
  78.  
  79. } /* UnloadSounds() */
  80.  
  81. WindowInit()
  82. {
  83.     Rect         myRect;
  84.     short        depth;
  85.     GrafPtr        savePort;
  86.     extern        CWindowPtr    gPictureWindow;
  87.  
  88.     GetPort(&savePort);
  89.     gPictureWindow = (CWindowPtr)GetNewCWindow(500, NIL_POINTER, (WindowPtr) -1L);
  90.     SetPort((GrafPtr) gPictureWindow);
  91.     
  92.     RGBForeColor(&myBlack);
  93.     RGBBackColor(&myWhite);
  94.     
  95.     SetPort(savePort);
  96.         
  97. } /* WindowInit() */
  98.